per sfondo.esegui9 :sfondo :lar :alt
; Procedura creata da G.Lariccia, QQ.tangram.02f e seguenti
; Creata il 9 novembre 2008 alle ore 16.37
as "dove.stavi dove
sfondi.attivi
as "nome.completo (parola :sfondo ".jpg)
bloccoindiceassegna 1
(bloccorecupera :nome.completo "jpg)
bloccoadatta :lar :alt
as "dove.stavi dove
cominciaxy 0 0
saltax meno quoziente :lar 2
saltay meno quoziente :alt 2
bloccoincolla
cominciapos :dove.stavi
as "item :nome.completo
stato.sfondo.recuperato
fine
per coniglietto
verbosetto.off
sfondonero
sfondo.esegui9 "coniglietto 672 750
nastarta
fine
per sfondo.esegui9 :sfondo :lar :alt
; Procedura creata da G.Lariccia, QQ.tangram.02f e seguenti
; Creata il 9 novembre 2008 alle ore 16.37
as "dove.stavi dove
sfondi.attivi
as "nome.completo (parola :sfondo ".jpg)
bloccoindiceassegna 1
(bloccorecupera :nome.completo "jpg)
bloccoadatta :lar :alt
as "dove.stavi dove
cominciaxy 0 0
saltax meno quoziente :lar 2
saltay meno quoziente :alt 2
bloccoincolla
cominciapos :dove.stavi
as "item :nome.completo
stato.sfondo.recuperato
fine
per coniglietto
verbosetto.off
sfondonero
sfondo.esegui9 "coniglietto 672 750
nastarta
fine